EXHIBIT A 



Main.c 

^♦******************************************* ************************** 

*********************************************************************** 
* 

* PROJECT: e-sistant for action-engine 
* 

*FILE: Main.c (Phase 1) 

* 

* DESCRIPTION: 
* 

* OBJECTIVE: 
* 

* REVISION HISTORY: 

5/1/99 Brian Roundtree initial version 

* 

**********************************************************************/ 

#include <Pilot.h> // all the system toolbox headers 

//#inciude <PalmOS.h> // NEW for 3.5. all the system toolbox headers 

//#include <PalmCompatibility.h> 

#include "CharAttr.h" 

#include "Chars.h" // special, the over the air symbol 

#include "SystemMgrS.h" // special hacks for 3.1 

#include "Globals.h" 

#include "osAddressDB.h" 
#include "osDatebook.h" 
#include "osDbMaker.h" 

#include "AddressDB.h" 
^include "Conversant.h" 
#include "Parser.h" 
#include "Main.h" 

#include "Main_res.h" // application resource defines 

y^^*^^******************************************************************* 
* 

* Entry Points 
* 

***********************************************************************/ 

DWord PilotMain (Word cmd, Ptr cmdPBP, Word launchFlags); 
static DWord IslandMain (Word cmd, Ptr cmdPBP. Word launchFlags); 

^*********************************************************************** 

* Global variables for this module 

**********************************************************************/ 

static MenuBarPtr CurrentMenu = NULL; // ptr to current menu 

static MatchLlst matchedltems; // Possible list item matches found 

static Sentence currentPlan; // Plan structure 

static DmOpenRef gListDB; // Global database of ESIS list, kept open while running 

static UnPkEsisRecd gUnpkdDbRecd; // Record holder for unpacked list currently in use 

^*********************************************************************** 

* Prototypes for internal functions 

**********************************************************************/ 

static void LoadUrllnfo(Ptr cmdPBP); 
static void StartApplication(void); 
static void StopApplication(void); 
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static void SetCurrentMenu(Word rscID); 

static Err GoToURL(CharPtr origurl); 

static Boolean GetPlanUrlFormat(CharRr str); 

static Boolean ApplicationHandleEvent(EventPtr event); 

static void EventLoop(void); 

static void MakeEsisUst(UnPkEsisRecdRr esisRecd, UInt listObj); 

static Err OpenOrCreateDB(DmOpenRef *dbP. ULong type, ULong creator, 

ULong mode, char *name. Boolean *created); 
static void !nitia!izeListDB(void); 

static void HandleEsisFieidProcessing ( EventType *event); 
static Err CheckOtherNeededDatabases (void); 
static void HandlePickFromList(Ulnt pick); 



Routines Called by the System **********************/ 
static void EsisListDrawFunc(Word itemNum, RectanglePtr bounds, CharPtr *s); 
static void DrawCharsToFitWidth(const char *s, RectangleRr r); 

^*********************************************************************** 

* FUNCTION: StartApplication 
* 

* DESCRIPTION: This routine sets up the initial state of the application. 
* 

* PARAMETERS: None. 
* 

* RETURNED: Nothing. 
* 

***********************************************************************/ 

static void StartApplication(void) 

{ 

FormPtr frm; 
FieldPtr fIdP; 

UInt mode = dmModeReadWrite; 

Boolean created; 
Err error; 

frm = FrmlnitForm(MainForm); 
FrmSetActiveForm(frm); 



SetCurrentMenu(MainMenuBar); 

OpenOrCreateDB( SgListDB, kListDBType, kEsisCreator, mode, 

kListDBName, &created);// Find the LIST database. If it doesn't exist, create it. 

if (created) 

if (l(error = CheckOtherNeededDatabasesQ)) 

ErrFatalDisplaylf(error, "Could not find Database. [BuildSentenceFromStruct]"); 
gUnpkdDbRecd.next[0].type = kTypeAction; 

GetListByTypeEsis(kTypeAction. gListDB, SgUnpkdDbRecd, kStartNew); 
MakeEsisList(&gUnpkdDbRecd, MainPickListList); // Load a default starting list 

fIdP = FrmGetObjectPtr(frm, FrmGetObjectlndex(frm, MainTextLineField)); 

FIdSetlnsPtPosition (fIdP, 0); 

FrmDrawForm(frm); 

LoadTalkField(""); In't the field 

SysTaskDelay(SysTicksPerSecond()); 
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LoadTalkField("What can I do for you?"); // finish the greeting 

FrmSetFocus (frm, FrmGetObjectlndex(frm, MainTextLineField)); 

} 

* FUNCTION: TermlnateApptication 

* DESCRIPTION: This routine cleans up the application for quiting 

* PARAMETERS: None. 

* RETURNED: Nothing. 

***********************************************************************^ 

static void StopApplication(void) 
{ 

if(gListDB) { // error check the pointer, If we switchUI(goToURL) the this global is bad 

DmCloseDatabase(gListDB); // this should be the only open DB 
gListDB = NULL; // clears it so we can test for NULL on a second pass 

} 

} 

I1t1t*1t1t**ititit*it*1t*1tit******itir***1r1t*it****it*it****1r****** 
* 

t 

* FUNCTION: SetCurrentMenu 

* DESCRIPTION: 

* PARAMETERS: rscID - resource id of the new menu 

* RETURNED: nothing 
* 

static void SetCurrentMenu(Word rscID) 
{ 

if (CurrentMenu) 

MenuDispose(CurrentMenu); 

CurrentMenu = Menulnit{rsclD); 

} 



♦ 

* FUNCTION: GoToURL 

* DESCRIPTION: 
♦ 

* PARAMETERS: parameter is ptr to URL string 
* 

* RETURNED: error, 0 means no error 
* 

Err GoToURL(CharPtr origurl) 
{ 
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Err err; 
CharRr uri; 

DmSearchStateType searchState; 
UlntcardNo; 
LocailD dbID; 
long strLen; 

StopAppiicationO; 



// cleanup because we loose giobals after we call switchU! 



// make a copy of the URL, since the OS will free 
// the parameter once Clipper quits 



StrLen = StrLen(orlgurl); 
urI = MemPtrNew{strLen+1); 

if (lurl) 

return sysErrNoFreeRAM; 
StrCopy(url, origurl); 

MemPtrSetOwner(url. 0); ^^^^ ^^.^^^^ ^^^^^^ 

err = DmGetNextDatabaseByTypeCreator (true. &searchState 

svsFileTApplication, sysFlleCClipper. true, &cardNo, &dblD). 
^^^Qrr){ // Clipper is not present 

FrmAlert(NoClipperAlert); 

MemRrFree(url); 

} 

err=SysUIAppSwitch(cardNo,dblD,sysAppLaunchCmdGoToURL,url); 
return err; 



/ 



* FUNCTION: 
* 

* DESCRIPTION: 
« 

* PARAMETERS: 

* RETURNED: 



ApplicationHandleEvent 
Handles processing of events for the 'main' form, 
event - the most recent event. 
True if the event is handled, false otherwise. 




static Boolean ApplicationHandleEvent(EventPtr event) 



{ 



Boolean 
FormRr 



handled = false; 
frm; 



switch (event->eType) { 

case ctlSeiectEvent: ^, un m 

if (event->data.ctlSelect.controllD == MainHandleltButton) { 

if (GetPlanUrlFormat((CharPtr)&strGetUrl)) { 
GoToURL((CharPtr)&strGetUrl); 
handled = true; 

} 

else 

handled = false; 

Lse if (event->data.ctlSelect.controllD == MainRememberPswdCheckbox) { 
handled = false; 
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} 

break; 
case IstSelectEvent: 

jf (event->dala.lstSelect.listlD == MainPickListList ) { 
HandlePickFromList( event->data.lstSelect.se!ection); 
handled = false; 

} 

break; 
case penUpEvent: 

handled = false; 

break; 
case menuEvent: 

MenuEraseStatus(Cun'entMenu); 

frm = Frm!nitForm(AboutForm); 

FrmDoDialog(frm); 

FrmDeleteForm(frm); 

handled = true; 

break; 
default: 

break; 

} 

return handled; 



/**************************^ 



* FUNCTION: 

* DESCRIPTION: 



GetPlanUrlFormat 

Use the global currentPlan to create a formated 
data URL & string 



* PARAMETERS: 

* RETURNED: true if a good string to send. 
* 

***********************************************************************/ 

static Boolean GetPlanUrlFormat(CharPtr str) 

{ 

char s[42]; 
UInt i; 
ULong temp; 

//StrCopy((CharPtr)&strGetUr!, •Tile:action.pqar); 



sffCODVfS^^^^^ ^ ^ - ir. A 

StrCopy(str/'http://207.202.236.19/scripts/action.dll?ParmTest?l^ /oZIPCODE ), // 1 est tne 



// 
// 

device ID codes 



// T=Type of Data param to follow, it is converted into type long 
StrCat(str. "&T="); 
temp = 1 ; 

StrPrintF(s;'%Ld",temp); 
StrCat(str. (CharPtr)&s); 

// U=Unique user planID, this number is assigned by the users device (Palm is seconds since 1904) 
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// when the plan done and the user presses Handle it! or similar function. The time is converted to 

// HEX to keep the string shorter (it saves a few bytes) 

StrCat(str;&U="); 

StrPrintF(s,"%Lx", currentPlan.plan.userlD); 
StrCat{str, (CharPtr)&s); 

// P=Param, what who where when, 4 byte type code ie-'ACTN' + 2 byte in Hex ie-MCOS' leave off the;0Oart 
// Should look like "ACTN0001NAME00000003PLCL00000003WHEN0004" 8 bytes long. These are linked with 
// no spaces. Use as many as needed. 
StrCat(str."&P="); 

for (i = 0; i < cun-entPlan.tree.blkCount; i++) { r^. * u. i,n t av 

ReadRecdPtrLengthToPtr( {UCharRr)&s, (UCharPtr)&(currentPlan.tree.block[i].sType), 4). 

s[4] = ^0'• terminate it 

StrCat(str. (CharPtr)&s); 

switch (cun-entPlan.tree.blockpl.sType) { 

case kTypeTalk: 

StrPrintF(s;'%x". 0); // .DEBUG 

break; 
case kTypeList: 

StrPrintF(s,"%x", 0); .DEBUG 

break; 
case kTypeAction: 

StrPrintF(s,"%x", currentPlan,tree.block[i].sListltem); 

break; 

case kTypeName: . . ,n.\ 

StrPrintF(s/'%Lx", currentPlan.tree.block[i].sdbRecUniquelD); 

break; 
case kTypeNamePalm: 

// _DEBUG below for demo only WVW 

//GetNameByUniquelD((CharPtr)&s. &gUnpkdDbRecd, currentPlan.tree.block[i].sdbRecUniquelD. 0 ); 

StrCopy(s, "John"); 
break; 

// DEBUG above for demo only 



AAAAA 



//This is the real code \AA/W 

StrPrintF(s;'%LJc", currentPlan.tree.block[i].sdbRecUniquelD); 
break; 

case kTypePlace: „ . ,r^x 

StrPrintF(s,"%lJ<", currentPlan.tree,block[i].sdbRecUniquelD); 

break; 

case kTypeTime: hpri ir 

StrPrintF(s,"%x", 0); .DEBUG 

break; 

case kTypeWhere: hpriip 
StrPrintF(s;'%x", 0); .DEBUG 

break; 
case kTypeWhen: 

StrPrintF(s,"%x", currentPlan.tree.block[i].sListltem); 

break; 

case kTypeNameLocation: 

StrPrintF(s;'%x",currentPlan.tree.block[i].sListltem); 

break: 
default: 

StrCopy((CharPtr)&s,"FFFF"); // Error 

return false; 

} 
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StrCat(str, (CharPtr)&s): 



} 

return true; 

} 

^********************************************************************** 

* FUNCTION: HandlePickFromList 
* 

* DESCRIPTION: 

* PARAMETERS: 

* RETURNED: Nothing. 

static void HandlePickFromList(Ulnt pick) 
{ 

LoadSentenceRecord( &gUnpkdDbRecd, &currentPlan, gUstDB, pick ); 

ParseUpdateList(0, MainPickListList, NoSelectltem); // reset the list selection to the top 



/ 
* 

* 



FUNCTION: EventLoop 
* 

* DESCRIPTION: 
* 

* PARAMETERS: None. 
* 

* RETURNED: Nothing. 
* 

*************************************************************** 

static void EventLoop(void) 
{ 

EventType event; 
Word error; 

do{ 

EvtGetEvent(&event, evtWaitForever); 
if (I SysHandleEvent(&event)) 

if (I MenuHandleEvent(CurrentMenu, &event, &error)) 
if (! ApplicationHandleEvent(&event)) 

FrmHandleEvent(FrmGetActiveForm(), &event); 

if (event.eType == keyDownEvent) { // This is Application handled, 

HandleEsisFieldProcessing( &event); // do it after the field is updated 

} 

} while (event.eType != appStopEvent); 



^*********************************************************************** 
* 

* FUNCTION: PilotMain 
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* DESCRIPTION: This function is the equivalent of a main() function 

under standard 'C*. It is called by the Emulator to begin 

* execution of this application. 

* PARAMETERS: cmd - command specifying how to launch the application, 

cmdPBP - parameter block for the command. 

* launchFlags - flags used to configure the launch. 
* 

* RETURNED: Any applicable error code. 

***********************************************************************/ 
□Word PilotMain(Word cmd, Ptr cmdPBP, Word launchFlags) 

return lslandMain( cmd, cmdPBP, launchFlags); 

} 

^*********************************************************************** 
* 

* FUNCTION: IslandMain 
* 

* DESCRIPTION: 
* 

* PARAMETERS: 
* 

* 

* RETURNED: void 

***********************************************************************/ 
DWord lslandMain(Word cmd, Ptr cmdPBP. Word launchFlags) 
{ 

Err error = 0; 

Boolean applsActive = launchFlags & sysAppLaunchFlagSubCall; 
switch (cmd) { 

case sysAppLaunchCmdNormalLaunch: 
StartApplicationO; 

if (cmdPBP != NULL && StrStr((CharPtr)cmdPBP, kLaunchEsistantAppI)) 
LoadUrllnfo(cmdPBP+15); // offset past the "palm:ESIS.appl?" 
EventLoopO; 
StopApplication(); 
break; 

case sysAppLaunchCmdURLParams: 

{ //launch new process 

Boolean launched; 

launched = launchFlags & sysAppLaunchFlagNewGlobals; 
if (launched) { 

StartApplication (); 

if (error) 

return (error); 

LoadUrllnfo(cmdPBP+1 9); // offset past the "palmcall:ESIS.appl\?" 

if (launched) { 
//EventLoopO; 
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StopApplicationQ; 

} 

} 

break; 

} 

return 0; 

} 



* 



* FUNCTION: LoadUrllnfo 
* 

* DESCRIPTION: 
* 

* PARAMETERS: 



* 



* RETURNED: void 

* . .. 

**♦********************************************************************/ 

void LoadUrllnfo(Ptr cmdPBP) 

{ 

Word ret; 

ret = FrmCustomAlert (EnterSceduleAlert, 

"I have placed everything in your calendar.", 

II ir nit\. 

lf( ret == EnterSceduleOK ) { 

ParseUrlForCommands ( (CharPtr)cmdPBP);// load the data in the back ground 

//launch the databook and show the date 

else if (ret == EnterSceduleHoldon ) { 
ret = FrmAlert (SchedDoltLaterAlert); 
if (SchedDoltLaterOK) 

ret = _DEBUG1; // NEEDS WORK 

else if (SchedDoltLaterForgetit) 

ret = _DEBUG1 ; // NEEDS WORK 

} 



y*********************************************************************** 
* 

* FUNCTION: MakeEsisLlst 

* DESCRIPTION: Builds a linked list and loads it into the 'listObj'. 



* 



* PARAMETERS: esisRecd ptr to UnPkEsisRecd variable 

listObj is the list object id 



* RETURNED: void 
* 

***********************************************************************/ 
static void MakeEsisLlst(UnPkEsisRecdPtr esisRecd, UInt listObj) 

{ 

FormPtr frmP; 

ListPtr listP; 

frmP = FrmGetActiveFornnO; 
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if (esisRecd->listCount) { // do if any Items in the list 

listP = FrmGetObjectRr(frmP, FrmGetObjectlndex(frmP, listObj)); 

LstEraseList(listP); 

LstSetListChoices(listP, NULL. esisRecd->listCount); 

LstSetDrawFunction(listP. EsisListDrawFunc); 
LstSetTopltem(listP, 0); 
LstSetSelection(listP, -1); 
LstDrawList(listP); 

FrmDrawFornn(frnnP); 



***************************** 



****************************************** 
* 

* FUNCTION: EsisListDrawFunc 



DESCRIPTION: Used by the List Manager to draw my list 

* PARAMETERS: Must use global static UnPkEsisRecd dbRecd 
* 

* RETURNED: void - Do not change the prototype! 



* 

*********************** 



************************************************/ 
static void EsisListDrawFunc(Word itemNum, RectanglePtr bounds. CharPtr*s) 

^ WinDrawChars( (CharPtr)&(gUnpkdDbRecd.list[itemNum].text), 

StrLen((CharPtr)&{gUnpkdDbRecd.list[itemNum].text)), 

bounds->topLeft.x, 
bounds->topLeft.y ); 

} 

/*********************************************************************** 



* 



* FUNCTION: OpenOrCreateDB 
* 

* DESCRIPTION: open a database. If it doesn't exist, create it. 
* 

* PARAMETERS: 
* 

* RETURNED: Db open error 
* 

***********************************************************************/ 

static Err OpenOrCreateDB( DmOpenRef *dbP, 

ULong type, 
ULong creator, 
ULong mode, 
Char *name, 
Boolean *created) 

{ 

Err err; 
*created ~ falser 

*dbP = DmOpenDatabaseByTypeCreator(type, creator, mode); 
err = DmGetLastErr(); 
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if (! *dbP) { 

err = DmCreateDatabase(0, name, creator, type, false); 
if (err) 

return err; 
•created = tme; 

*dbP = DmOpenDatabaseByTypeCreator(type. creator, mode); 
if (! *dbP) 

return DmGetLastEn-O; 

} 

if (*created) { 

InitializeListDBQ; 

} 

return err; 



} 



/*** TEMP ?? ***/ 

^*********************************************************************** 
* 

* FUNCTION: InitializeListDB 

* DESCRIPTION: initialize a basic database 
* 

* PARAMETERS: void 

* RETURNED: void 



* 



***********************************************************************/ 

static void InitializeListDB(void) 

{ 

UnPkEsisRecd c1 , c2, c3; 
TalkList t1 ; 

CharPtr sP; 
VoidHand h2; 
UnPkEsisRecd *nDbRec[3]; 

UInt numLists = 3; 
UInt i, ii; 



cl.id =1; 

d.type = kTypeAction; 

c1 .creator = kEsisCreator; 

c1 .version = 1 ; 

d.priorCount =2; 

d.priorOffset =0; 

d.nextCount =2; 

c1 .nextOffset = 0; 

d.listCount =4; 

c1.list[0].uniquelD =0; 

d .list[0].esislD = kEsisldMask; 

StrCopy((CharPtr)c1.list[0].text, "Arrange meeting wr); 

c1.list[1].uniquelD =0; 

c1.list[1].esislD = kEsisldMask; 

StrCopy((CharPtr)c1,list[1].text, 'Take care of ?"); 
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c1.list[2].uniquelD 

c1 .listpj.esisID 

StrCopy((CharRr)c1 

c1.list[3].uniquelD 

c1.list[3].esislD 

StfCopy((CharPtr)c1 

c1.prior[0].reserved 

c1 .prior(01.type 

c1.prior[1].reserved 

c1.prior[1].type 

c1.next[0].reserved 

c1 .next[01.type 

c1.next[1].reserved 

c1.next[1].type 



= 0: 

kEsisldMask; 
.listpl.text, "Lunch wr); 
= 0; 

kEsisldMask; 
.list[3].text, "Dinner wr); 

= 0; 

= 'XXXX'; 

= 0; 

= 'XXXX'; 

= 0; 

= kTypeName; 

= 0; 

= *XXXX'; 



c2.id 

c2.type 

c2. creator 

c2.version 

c2.priorCount 

c2.priorOffset 

c2.nextCount 

c2.nextOffset 

c2.listCount 

c2.list[0].uniquelD 

c2.list[0].esislD 

StrCopy((CharRr)c2. 

c2.list[1].unique!D 

c2.list[1].esislD 

StrCopy((CharPtr)c2. 

c2.list[2].uniquelD 

c2.list[2].esisiD 

StrCopy((CharPtr)c2. 

c2.list[3].uniquelD 

c2.list[3].esislD 

StrCopy((CharPtr)c2. 

c2.prior[0].reserved 

c2.prior[0].type 

c2.priorI1].reserved 

c2.prior[1].type 

c2.next[0].resen/ed 

c2.next[0].type 

c2.next[1].reserved 

c2.ne)ct[1].type 

c3.id 
c3.type 
c3.creator 
c3.version 
c3.priorCount 
c3.prlorOffset 
c3.nextCount 
c3,nextOffset 
c3.listCount 
c3.1ist[0].uniquelD 
c3.list[0].esislD 



= 2; 

= kTypePlace; , 
= kEsisCreator; 

= 1; 
= 2; 
= 0; 
= 2; 
= 0; 
= 4; 

= 111; 
= kEsisldMask; 
list[0].text. "Home"); 
= 222; 
= kEsisldMask; 
list[1].text. "My Office"); 
= 333; 
= kEsisldMask; 
list[2].text, "Lunch"); 
= 444; 
= kEsisldMask; 
list[3].text, "Dinner"); 
= 0; 

= kTypeTlme; 

= 0; 

= kTypeWhere; 

= 0; 

= kTypeWhen; 

= 0; 

= kTypeWhen; 

= 4; 
= kTypeWhen; 
= kEsisCreator; 



= 1; 



= 2; 
= 0; 
= 2; 
= 0; 
= 4; 



= 111; 
= kEsisldMask; 
StrCopy((CharPtr)c3.list[0].text, "Pick a day...?"); 
c3Jlst[1].uniquelD = 222; 
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c3.list[1].esisiD = kEsisldMask; 

StrCopy((CharPtr)c3.list[1].text. "Show possible dates."); 
c3Jist[2].uniquelD = 333; 
c3Jist[2].esislD = kEsisldMask; 

StrCopy((CharPtr)c3.1ist[21.text,"ASAP!"); 
c3.list[3].uniquelD = 444; 

c3.1ist[3].esislD = kEsisldMask; 

StrCopy((CharPtr)c3.listI3J.text. "Next Week sometime."); 
c3.prior[0].reserved = 0; 



c3.prior[0].type 

c3.prior[1].reserved 

c3.priorI1],type 

c3.next[0].reserved 

c3.next[0].type 

c3.next[1].reserved 

c2.next[1].type 



= kTypePlace; 
0; 

= kTypeAction; 
0; 

= kTypeEnd; 

0; 

= kTypeEnd; 



nDbRec[0] = &c1; 
nDbRec[1] = &c2; 
nDbRec[2] = &c3; 
for (i = 0; i < numLists; i++) { 

UInt index = dmMaxRecordlndex; 

VoidHand h = DmNewRecord(gLlstDB. Sindex, 1); 

if (h) { 

PackListToDB(nDbRec[i]. h); 
DmReleaseRecord(gListDB, index, true); 

} 



} 



t1 .id = 3; 

t1 .type = kTypeTalk; 

t1 .version = 1 ; 

t1 .count = 4; 
t1.item[0].type = kTypeAction; 
StrCopy( (CharPtr) &(t1.item[0].text 
t1 .item[1].type = kTypeName; 
StrCopy( (CharPtr) &(t1jtem[1].text 
t1.item[2].type = kTypePlace; 
StrCopy( (CharPtr) &(t1.item[2].text 
t1.item[3].type = kTypeWhen; 
StrCopy( (CharPtr) &(t1.item[3].text 
t1.item[4].type = kTypePlace; 
StrCopy( (CharRr) &(t1 .item[4].text 
t1.item[5].type = kTypePlace; 
StrCopy( (CharPtr) &(t1 .item[5].text 
t1.item[6].type = kTypePlace; 
StrCopy( (CharPtr) &(t1.item[6].text 
t1.item[7].type = kTypePlace; 
StrCopy( (CharPtr) &(t1.item[7].text 
t1.item[8].type = kTypePlace; 
StrCopy( (CharPtr) &(t1.item[8].text 
t1.item[9].type = kTypePlace; 
StrCopy( (CharPtr) &(t1.item[9].text 



ii = dmMaxRecordlndex; 
h2 = DmNewRecord(gListDB. &ii, 1 
if (MemHandleResize(h2, sizeof(TalkList)) == 0) { 



// NOTE: the palm OS categories are used to group list 'type's 
// NOTE: Zero based Index 
"What can I do for you?"); 
'With who?"); 
"Whereat?"); 

"When would you like to do this?"); 

"4 Duh!"); 

"5 Duh!"); 

"6 Duh!"); 

"7 Duh!"); 

"8 Duh!"); 

"9 Duh!"); 
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sP = MemHanclleLock(h2): 

i = 0; // write static-sized block of data I 

DmWrite{sP. i, &t1. sizeoffTalkUst)); 

MemHandleUnlock(h2); 

} 

DnnReleaseRecord(gListDB, ii, true); 

} 



* 



* FUNCTION: 
* 

* DESCRIPTION: 

* PARAMETERS: 



HandleEsisFieidProcessing 
handles text related events in the esistant feild ONLY 
event to handle 
void 



* RETURNED: 
* 



7 



void HandleEsisFieidProcessing ( EventType *event) { 



if (TxtCharlsPrint(event->data.keyDown.chr)) { // Conversion problem from R5 to R6 

ParseFindSegment ( gListDB, &gUnpkdDbRecd, &matchedltems, 

&currentPlan, event->data.keyDown.chr); 



* FUNCTION: 

* DESCRIPTION: 



CheckOtherNeededDatabases 



* PARAMETERS: 



* RETURNED: 



Err error 



static Err CheckOtherNeededDatabases (void) 
{ 

// check for '[e-sistant]' category In the address book 
return 0; 



} 



/* 

static CategoriesStruct *GetLockedApplnfo() 
{ 

UInt cardNo; 
LocallD dbID; 
LocallD applnfolD; 
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Err err; 

if ({err = DmOpenDatabaselnfo(gProductDB, &dblD, NULL, NULL, 
&cardNo, NULL)) 0) 
return NULL; 

if ((err = DmDatabaselnfo{cardNo. dblD. NULL, NULL. NULL. NULL. NULL. 
NULL, NULL, &appInfoID, NULL. NULL, NULL)) != 0) 
return NULL; 

return MemLocallDToLockedRr(applnfolD, cardNo); 

} 
V 

// draw strings at top of rectangle r, but don't overwrite 
// right-edge of r 

static void DrawCharsToFitWidth(const char *s, RectanglePtr r) 
{ 

SWord stringLength = StrLen(s); 
SWord pIxelWidth = r->extent.x; 
Boolean truncate; 

// FntCharslnWidth will update stringLength to the 
// maximum without exceeding the width 
FntCharslnWldth(s, &pixelWidth, &stringLength. &truncate); 
WinDrawChars(s, stringLength, r->topLeft.x, r->topLeft.y); 



/ 



*********************************************************************** 



* FUNCTION: 
* 

* DESCRIPTION: 



UpdateTalkField 

**This is in the Main.c in order to pickup the global 
variable 'gListDB' - because of a bug in the compiler 
the project will not link the globals?? - move it back 
the into Conversant.c when the bug is fixed. 



* PARAMETERS: 
* 

* RETURNED: 



Err error 



***********************************************************************^ 

void UpdateTalkField( ULong type) 
{ 



Int 

Handle 

TalkListPtr 

UInt 

ULong 

Boolean 



numOfRecords; 
rH; 
r; 

q, i, reclndex; 
uniquelD; 
gotit = false; 



if (type == kTypeEnd ) { 

LoadTalkField ("I have everything I need!"); 
SysTaskDelay(SysTicksPerSecond()); 
LoadTalkField ("Should I take care of it?"); 
return; 

} 
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numOfRecords = DmNumRecx)rds(gListDB); 
reclndex = 0; 

for (i = 0; i < numOfRecords; { 

if (DmSeekRecordlnCategory (gUstDB. &reclndex, 0, dmSeekForward, dmAIICategories)) 
break; 

DmRecordlnfo(gUstDB. reclndex. NULL. &uniquelD. NULL); 
rH = DmQueryRecord(gListDB, reclndex); 

if (!rH) // If we have found a deleted record stop the search, 

break; 

r = (TalkListRr) MemHandleLock(rH); 
if (r->type == kTypeTalk) { 

for (q = 0; q < r->count; q++) { 
if (r->item[q].type == type) { 

LoadTalkField ((CharPtr) &(r->item[q].text)): 

gotit = true; 

break; 

} 

} 

} 

MenriHandleUnlock(rH); 
reclndex++; 

} 

if (igotit) 

LoadTalkField ("I'm confused?!?!"); 
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